home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
- global gSystemVolumeLevel
- repeat while the mouseDown = 1
- set the locH of sprite 8 to the mouseH
- if the mouseH < 96 then
- set the locH of sprite 8 to 96
- end if
- if the mouseH > 307 then
- set the locH of sprite 8 to 307
- end if
- if the locH of sprite 8 = 96 then
- set the locV of sprite 7 to 124
- else
- set the locV of sprite 7 to 102
- end if
- updateStage()
- end repeat
- set gSystemVolumeLevel to (the locH of sprite 8 - 96) * 255 / 210
- end
-
- on mouseUp
- global gSystemVolumeLevel
- set the soundLevel to integer(gSystemVolumeLevel / 36.42000000000000171)
- end
-